/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_5 / issue_10 / hints / fonts

< prev

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 64 02 00 00 54 03 00 00 |Archive.|d...T...|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 45 78 61 6d 70 6c 65 | 00 00 00 00 ff ff ff ff |.Example|........|
|00000070| 46 fd ff ff ca 7f fc 1e | 00 00 00 00 ff ff ff ff |F.......|........|
|00000080| 1c 02 00 80 82 21 46 6f | 6e 74 73 00 00 00 00 00 |.....!Fo|nts.....|
|00000090| ff ff ff ff 46 fd ff ff | d4 7f fc 1e 00 00 00 00 |....F...|........|
|000000a0| ff ff ff ff fc 00 00 80 | 82 21 42 6f 6f 74 00 73 |........|.!Boot.s|
|000000b0| 74 00 00 00 87 01 00 00 | 43 eb ff ff 11 f3 c1 dc |t.......|C.......|
|000000c0| 03 00 fc 7e 87 01 00 00 | e5 06 00 00 82 21 52 75 |...~....|.....!Ru|
|000000d0| 6e 00 65 73 74 00 00 00 | 64 01 00 00 43 eb ff ff |n.est...|d...C...|
|000000e0| e8 fb c1 dc 03 00 c8 9d | 64 01 00 00 90 08 00 00 |........|d.......|
|000000f0| 82 21 53 70 72 69 74 65 | 73 00 00 00 e4 03 00 00 |.!Sprite|s.......|
|00000100| 43 f9 ff ff 99 e0 c7 2c | 03 00 a5 f0 e4 03 00 00 |C......,|........|
|00000110| 18 0a 00 00 82 46 6f 6e | 74 54 65 73 74 00 00 00 |.....Fon|tTest...|
|00000120| 9d 06 00 00 43 fb ff ff | 51 db c2 dc 03 00 b1 53 |....C...|Q......S|
|00000130| 9d 06 00 00 20 0e 00 00 | 00 46 6f 6e 74 54 65 73 |.... ...|.FontTes|
|00000140| 74 00 00 00 9d 06 00 00 | 43 fb ff ff 51 db c2 dc |t.......|C...Q...|
|00000150| 03 00 b1 53 9d 06 00 00 | 24 00 00 00 82 21 46 6f |...S....|$....!Fo|
|00000160| 6e 74 73 32 00 00 00 00 | ff ff ff ff 46 fd ff ff |nts2....|....F...|
|00000170| fc 7f fc 1e 00 00 00 00 | ff ff ff ff d4 01 00 80 |........|........|
|00000180| 82 21 42 6f 6f 74 00 73 | 74 00 00 00 78 00 00 00 |.!Boot.s|t...x...|
|00000190| 43 eb ff ff 7e b0 c1 dc | 03 00 94 64 78 00 00 00 |C...~...|...dx...|
|000001a0| e1 14 00 00 82 21 52 75 | 6e 00 65 73 74 00 00 00 |.....!Ru|n.est...|
|000001b0| a4 01 00 00 43 eb ff ff | 2b 8a c8 dc 03 00 9c ac |....C...|+.......|
|000001c0| a4 01 00 00 7d 15 00 00 | 82 21 53 70 72 69 74 65 |....}...|.!Sprite|
|000001d0| 73 00 00 00 e4 03 00 00 | 43 f9 ff ff 53 94 ca 88 |s.......|C...S...|
|000001e0| 03 00 c6 e2 e4 03 00 00 | 45 17 00 00 82 46 6f 6e |........|E....Fon|
|000001f0| 74 54 65 73 74 00 00 00 | 9d 06 00 00 43 fb ff ff |tTest...|....C...|
|00000200| 51 db c2 dc 03 00 b1 53 | 9d 06 00 00 4d 1b 00 00 |Q......S|....M...|
|00000210| 00 46 6f 6e 74 54 65 73 | 74 00 00 00 9d 06 00 00 |.FontTes|t.......|
|00000220| 43 fb ff ff 51 db c2 dc | 03 00 b1 53 9d 06 00 00 |C...Q...|...S....|
|00000230| 24 00 00 00 82 21 46 6f | 6e 74 73 33 00 00 00 00 |$....!Fo|nts3....|
|00000240| 0b 00 00 00 43 ff ff ff | 60 59 c5 dc 03 00 03 88 |....C...|`Y......|
|00000250| 0b 00 00 00 0e 22 00 00 | 00 00 00 00 00 00 00 00 |....."..|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 82 46 6f 6e |........|.....Fon|
|00000280| 74 54 65 73 74 00 00 00 | 9d 06 00 00 43 fb ff ff |tTest...|....C...|
|00000290| 51 db c2 dc 03 00 b1 53 | 9d 06 00 00 24 00 00 00 |Q......S|....$...|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 46 69 6c 65 | 44 61 74 61 82 46 6f 6e |....File|Data.Fon|
|00000360| 74 54 65 73 74 00 00 00 | 9d 06 00 00 43 fb ff ff |tTest...|....C...|
|00000370| 51 db c2 dc 03 00 b1 53 | 0d 00 0a 10 f4 20 3e 20 |Q......S|..... > |
|00000380| 46 6f 6e 74 54 65 73 74 | 0d 00 14 2b f4 20 50 72 |FontTest|...+. Pr|
|00000390| 6f 67 72 61 6d 20 74 6f | 20 74 65 73 74 20 76 61 |ogram to| test va|
|000003a0| 6c 69 64 69 74 79 20 6f | 66 20 46 6f 6e 74 24 50 |lidity o|f Font$P|
|000003b0| 61 74 68 0d 00 1e 1e f4 | 20 41 6e 64 72 65 77 20 |ath.....| Andrew |
|000003c0| 46 65 72 67 75 73 6f 6e | 20 31 32 2f 30 35 2f 39 |Ferguson| 12/05/9|
|000003d0| 32 0d 00 28 05 f4 0d 00 | 32 17 4d 61 78 42 75 66 |2..(....|2.MaxBuf|
|000003e0| 66 65 72 4c 65 6e 67 74 | 68 3d 32 35 35 0d 00 3c |ferLengt|h=255..<|
|000003f0| 1f de 20 42 75 66 66 65 | 72 50 74 72 20 4d 61 78 |.. Buffe|rPtr Max|
|00000400| 42 75 66 66 65 72 4c 65 | 6e 67 74 68 0d 00 46 05 |BufferLe|ngth..F.|
|00000410| f4 0d 00 50 2a f4 20 49 | 6e 69 74 69 61 6c 69 73 |...P*. I|nitialis|
|00000420| 65 20 61 72 65 61 20 77 | 69 74 68 20 64 75 6d 6d |e area w|ith dumm|
|00000430| 79 20 63 68 61 72 61 63 | 74 65 72 0d 00 5a 05 f4 |y charac|ter..Z..|
|00000440| 0d 00 64 10 e3 20 4e 25 | 3d 30 20 b8 20 32 35 34 |..d.. N%|=0 . 254|
|00000450| 0d 00 6e 15 3f 28 4e 25 | 2b 42 75 66 66 65 72 50 |..n.?(N%|+BufferP|
|00000460| 74 72 29 3d 30 0d 00 78 | 08 ed 20 4e 25 0d 00 82 |tr)=0..x|.. N%...|
|00000470| 05 f4 0d 00 8c 26 f4 20 | 43 68 65 63 6b 20 66 6f |.....&. |Check fo|
|00000480| 72 20 65 78 69 73 74 65 | 6e 63 65 20 6f 66 20 46 |r existe|nce of F|
|00000490| 6f 6e 74 24 50 61 74 68 | 0d 00 96 05 f4 0d 00 a0 |ont$Path|........|
|000004a0| 4d ee 20 85 20 f2 65 72 | 72 6f 72 28 22 55 6e 61 |M. . .er|ror("Una|
|000004b0| 62 6c 65 20 74 6f 20 6c | 6f 63 61 74 65 20 46 6f |ble to l|ocate Fo|
|000004c0| 6e 74 24 50 61 74 68 2e | 20 48 61 73 20 21 46 6f |nt$Path.| Has !Fo|
|000004d0| 6e 74 73 20 62 65 65 6e | 20 73 65 65 6e 20 62 79 |nts been| seen by|
|000004e0| 20 46 69 6c 65 72 22 2c | 30 29 0d 00 aa 42 c8 99 | Filer",|0)...B..|
|000004f0| 20 22 4f 53 5f 52 65 61 | 64 56 61 72 56 61 6c 22 | "OS_Rea|dVarVal"|
|00000500| 2c 22 46 6f 6e 74 24 50 | 61 74 68 22 2c 20 42 75 |,"Font$P|ath", Bu|
|00000510| 66 66 65 72 50 74 72 2c | 20 4d 61 78 42 75 66 66 |fferPtr,| MaxBuff|
|00000520| 65 72 4c 65 6e 67 74 68 | 2c 30 2c 33 0d 00 b4 09 |erLength|,0,3....|
|00000530| ee 20 85 20 87 0d 00 be | 05 f4 0d 00 c8 47 f4 20 |. . ....|.....G. |
|00000540| 52 65 61 64 20 53 74 72 | 69 6e 67 20 2d 20 53 74 |Read Str|ing - St|
|00000550| 6f 70 20 61 74 20 66 69 | 72 73 74 20 73 70 61 63 |op at fi|rst spac|
|00000560| 65 20 6f 72 20 77 68 65 | 6e 20 4d 61 78 42 75 66 |e or whe|n MaxBuf|
|00000570| 66 65 72 4c 65 6e 67 74 | 68 20 72 65 61 63 68 65 |ferLengt|h reache|
|00000580| 64 0d 00 d2 24 f4 20 54 | 61 6b 65 6e 20 66 72 6f |d...$. T|aken fro|
|00000590| 6d 20 41 72 63 68 69 76 | 65 20 34 2e 31 20 70 61 |m Archiv|e 4.1 pa|
|000005a0| 67 65 20 31 30 0d 00 dc | 05 f4 0d 00 e6 15 4e 25 |ge 10...|......N%|
|000005b0| 3d 30 3a 46 6f 6e 74 50 | 61 74 68 24 3d 22 22 0d |=0:FontP|ath$="".|
|000005c0| 00 f0 05 f5 0d 00 fa 19 | 4e 24 3d bd 28 3f 28 4e |........|N$=.(?(N|
|000005d0| 25 2b 42 75 66 66 65 72 | 50 74 72 29 29 0d 01 04 |%+Buffer|Ptr))...|
|000005e0| 27 e7 20 97 28 4e 24 29 | 3c 3e 30 20 8c 20 46 6f |'. .(N$)|<>0 . Fo|
|000005f0| 6e 74 50 61 74 68 24 3d | 46 6f 6e 74 50 61 74 68 |ntPath$=|FontPath|
|00000600| 24 2b 4e 24 0d 01 0e 09 | 4e 25 2b 3d 31 0d 01 18 |$+N$....|N%+=1...|
|00000610| 16 fd 20 97 28 4e 24 29 | 3d 30 20 84 20 4e 25 3d |.. .(N$)|=0 . N%=|
|00000620| 32 35 36 0d 01 22 05 f4 | 0d 01 2c 3c f4 20 43 68 |256.."..|..,<. Ch|
|00000630| 65 63 6b 20 74 6f 20 73 | 65 65 20 69 66 20 73 69 |eck to s|ee if si|
|00000640| 7a 65 20 6f 66 20 46 6f | 6e 74 20 50 61 74 68 20 |ze of Fo|nt Path |
|00000650| 69 73 20 67 72 65 61 74 | 65 72 20 74 68 61 6e 20 |is great|er than |
|00000660| 7a 65 72 6f 0d 01 36 05 | f4 0d 01 40 4f e7 20 a9 |zero..6.|...@O. .|
|00000670| 28 46 6f 6e 74 50 61 74 | 68 24 29 3d 30 20 8c 20 |(FontPat|h$)=0 . |
|00000680| f2 65 72 72 6f 72 28 22 | 46 6f 6e 74 24 50 61 74 |.error("|Font$Pat|
|00000690| 68 20 61 70 70 65 61 72 | 73 20 74 6f 20 62 65 20 |h appear|s to be |
|000006a0| 65 6d 70 74 79 20 70 6c | 65 61 73 65 20 63 6f 72 |empty pl|ease cor|
|000006b0| 72 65 63 74 22 2c 30 29 | 0d 01 4a 05 f4 0d 01 54 |rect",0)|..J....T|
|000006c0| 41 f4 20 52 65 61 64 20 | 74 68 72 6f 75 67 68 20 |A. Read |through |
|000006d0| 46 6f 6e 74 50 61 74 68 | 24 20 61 6e 64 20 63 68 |FontPath|$ and ch|
|000006e0| 65 63 6b 20 74 68 61 74 | 20 65 61 63 68 20 65 6e |eck that| each en|
|000006f0| 74 72 79 20 69 73 20 61 | 20 76 61 6c 69 64 0d 01 |try is a| valid..|
|00000700| 5e 34 f4 20 44 69 72 65 | 63 74 6f 72 79 2e 20 44 |^4. Dire|ctory. D|
|00000710| 69 72 65 63 74 6f 72 69 | 65 73 20 61 72 65 20 73 |irectori|es are s|
|00000720| 65 70 61 72 61 74 65 64 | 20 62 79 20 63 6f 6d 6d |eparated| by comm|
|00000730| 61 73 0d 01 68 05 f4 0d | 01 72 14 4e 25 3d 31 3a |as..h...|.r.N%=1:|
|00000740| 4e 24 3d 22 22 3a 41 24 | 3d 22 22 0d 01 7c 05 f5 |N$="":A$|=""..|..|
|00000750| 0d 01 86 05 f5 0d 01 90 | 26 41 24 3d c1 46 6f 6e |........|&A$=.Fon|
|00000760| 74 50 61 74 68 24 2c 4e | 25 2c 31 29 3a e7 20 41 |tPath$,N|%,1):. A|
|00000770| 24 3d 22 2c 22 20 41 24 | 3d 22 22 0d 01 9a 12 4e |$="," A$|=""....N|
|00000780| 24 3d 4e 24 2b 41 24 3a | 4e 25 2b 3d 31 0d 01 a4 |$=N$+A$:|N%+=1...|
|00000790| 1d fd 20 41 24 3d 22 22 | 20 84 20 4e 25 3d a9 28 |.. A$=""| . N%=.(|
|000007a0| 46 6f 6e 74 50 61 74 68 | 24 29 0d 01 ae 13 41 3d |FontPath|$)....A=|
|000007b0| a4 63 68 65 63 6b 64 69 | 72 28 4e 24 29 0d 01 b8 |.checkdi|r(N$)...|
|000007c0| 4b e7 20 41 3c 3e 32 20 | 8c 20 f2 65 72 72 6f 72 |K. A<>2 |. .error|
|000007d0| 28 4e 24 2b 22 20 69 73 | 20 6e 6f 74 20 61 20 76 |(N$+" is| not a v|
|000007e0| 61 6c 69 64 20 46 6f 6e | 74 73 20 44 69 72 65 63 |alid Fon|ts Direc|
|000007f0| 74 6f 72 79 20 69 6e 20 | 46 6f 6e 74 24 50 61 74 |tory in |Font$Pat|
|00000800| 68 21 21 21 22 2c 30 29 | 0d 01 c2 09 4e 24 3d 22 |h!!!",0)|....N$="|
|00000810| 22 0d 01 cc 15 fd 20 4e | 25 3d a9 28 46 6f 6e 74 |"..... N|%=.(Font|
|00000820| 50 61 74 68 24 29 0d 01 | d6 05 f4 0d 01 e0 3e f4 |Path$)..|......>.|
|00000830| 20 49 66 20 74 68 69 73 | 20 70 61 72 74 20 6f 66 | If this| part of|
|00000840| 20 74 68 65 20 70 72 6f | 67 72 61 6d 20 69 73 20 | the pro|gram is |
|00000850| 72 65 61 63 68 65 64 20 | 74 68 65 6e 20 61 6c 6c |reached |then all|
|00000860| 20 69 73 20 77 65 6c 6c | 2e 0d 01 ea 05 f4 0d 01 | is well|........|
|00000870| f4 05 e0 0d 01 fe 05 f4 | 0d 02 08 28 f4 20 50 72 |........|...(. Pr|
|00000880| 6f 63 65 64 75 72 65 20 | 74 6f 20 64 69 73 70 6c |ocedure |to displ|
|00000890| 61 79 20 65 72 72 6f 72 | 20 6d 65 73 73 61 67 65 |ay error| message|
|000008a0| 0d 02 12 05 f4 0d 02 1c | 1a dd 20 f2 65 72 72 6f |........|.. .erro|
|000008b0| 72 28 45 72 72 6f 72 24 | 2c 45 72 72 6f 72 29 0d |r(Error$|,Error).|
|000008c0| 02 26 0d de 20 62 25 20 | 31 30 30 30 0d 02 30 1c |.&.. b% |1000..0.|
|000008d0| 21 62 25 3d 45 72 72 6f | 72 3a 24 28 62 25 2b 34 |!b%=Erro|r:$(b%+4|
|000008e0| 29 3d 45 72 72 6f 72 24 | 0d 02 3a 16 3f 28 62 25 |)=Error$|..:.?(b%|
|000008f0| 2b a9 24 28 62 25 2b 34 | 29 2b 34 29 3d 30 0d 02 |+.$(b%+4|)+4)=0..|
|00000900| 44 3b c8 99 22 57 69 6d | 70 5f 52 65 70 6f 72 74 |D;.."Wim|p_Report|
|00000910| 45 72 72 6f 72 22 2c 62 | 25 2c 26 31 38 2c 22 45 |Error",b|%,&18,"E|
|00000920| 72 72 6f 72 20 66 72 6f | 6d 20 46 6f 6e 74 24 50 |rror fro|m Font$P|
|00000930| 61 74 68 20 54 65 73 74 | 22 0d 02 4e 05 e0 0d 02 |ath Test|"..N....|
|00000940| 58 05 e1 0d 02 62 05 f4 | 0d 02 6c 2e f4 20 46 75 |X....b..|..l.. Fu|
|00000950| 6e 63 74 69 6f 6e 20 74 | 6f 20 63 68 65 63 6b 20 |nction t|o check |
|00000960| 74 68 61 74 20 4e 24 20 | 69 73 20 61 20 64 69 72 |that N$ |is a dir|
|00000970| 65 63 74 6f 72 79 0d 02 | 76 05 f4 0d 02 80 19 dd |ectory..|v.......|
|00000980| 20 a4 63 68 65 63 6b 64 | 69 72 28 46 6f 6e 74 44 | .checkd|ir(FontD|
|00000990| 69 72 24 29 0d 02 8a 0d | de 20 62 25 20 31 30 30 |ir$)....|. b% 100|
|000009a0| 30 0d 02 94 38 e7 20 c2 | 46 6f 6e 74 44 69 72 24 |0...8. .|FontDir$|
|000009b0| 29 3d 22 2e 22 20 8c 20 | 46 6f 6e 74 44 69 72 24 |)="." . |FontDir$|
|000009c0| 3d c0 46 6f 6e 74 44 69 | 72 24 2c a9 28 46 6f 6e |=.FontDi|r$,.(Fon|
|000009d0| 74 44 69 72 24 29 2d 31 | 29 0d 02 9e 10 24 62 25 |tDir$)-1|)....$b%|
|000009e0| 3d 46 6f 6e 74 44 69 72 | 24 0d 02 a8 1f c8 99 20 |=FontDir|$...... |
|000009f0| 22 58 4f 53 5f 46 69 6c | 65 22 2c 35 2c 62 25 20 |"XOS_Fil|e",5,b% |
|00000a00| b8 20 45 78 69 73 74 73 | 0d 02 b2 0b 3d 45 78 69 |. Exists|....=Exi|
|00000a10| 73 74 73 0d ff 46 69 6c | 65 44 61 74 61 82 21 42 |sts..Fil|eData.!B|
|00000a20| 6f 6f 74 00 73 74 00 00 | 00 87 01 00 00 43 eb ff |oot.st..|.....C..|
|00000a30| ff 11 f3 c1 dc 03 00 fc | 7e 7c 20 42 6f 6f 74 20 |........|~| Boot |
|00000a40| 66 69 6c 65 20 66 6f 72 | 20 21 46 6f 6e 74 73 0a |file for| !Fonts.|
|00000a50| 7c 0a 49 63 6f 6e 73 70 | 72 69 74 65 73 20 3c 4f ||.Iconsp|rites <O|
|00000a60| 62 65 79 24 44 69 72 3e | 2e 21 53 70 72 69 74 65 |bey$Dir>|.!Sprite|
|00000a70| 73 0a 7c 0a 7c 49 66 20 | 22 3c 46 6f 6e 74 24 50 |s.|.|If |"<Font$P|
|00000a80| 72 65 66 69 78 3e 22 3d | 22 22 20 54 68 65 6e 20 |refix>"=|"" Then |
|00000a90| 52 4d 45 6e 73 75 72 65 | 20 46 6f 6e 74 4d 61 6e |RMEnsure| FontMan|
|00000aa0| 61 67 65 72 20 32 2e 34 | 32 20 52 4d 4c 6f 61 64 |ager 2.4|2 RMLoad|
|00000ab0| 20 3c 4f 62 65 79 24 44 | 69 72 3e 2e 46 6f 6e 74 | <Obey$D|ir>.Font|
|00000ac0| 73 0a 7c 49 66 20 22 3c | 46 6f 6e 74 24 50 72 65 |s.|If "<|Font$Pre|
|00000ad0| 66 69 78 3e 22 3d 22 22 | 20 54 68 65 6e 20 52 4d |fix>"=""| Then RM|
|00000ae0| 45 6e 73 75 72 65 20 53 | 75 70 65 72 53 61 6d 70 |Ensure S|uperSamp|
|00000af0| 6c 65 20 30 2e 30 34 20 | 52 4d 4c 6f 61 64 20 3c |le 0.04 |RMLoad <|
|00000b00| 4f 62 65 79 24 44 69 72 | 3e 2e 53 75 70 65 72 0a |Obey$Dir|>.Super.|
|00000b10| 49 66 20 22 3c 46 6f 6e | 74 24 50 72 65 66 69 78 |If "<Fon|t$Prefix|
|00000b20| 3e 22 3d 22 22 20 54 68 | 65 6e 20 53 65 74 4d 61 |>"="" Th|en SetMa|
|00000b30| 63 72 6f 20 46 6f 6e 74 | 24 50 61 74 68 20 3c 46 |cro Font|$Path <F|
|00000b40| 6f 6e 74 24 50 72 65 66 | 69 78 3e 2e 0a 49 66 20 |ont$Pref|ix>..If |
|00000b50| 22 3c 46 6f 6e 74 24 50 | 72 65 66 69 78 3e 22 3d |"<Font$P|refix>"=|
|00000b60| 22 22 20 54 68 65 6e 20 | 53 65 74 20 46 6f 6e 74 |"" Then |Set Font|
|00000b70| 24 50 72 65 66 69 78 20 | 3c 4f 62 65 79 24 44 69 |$Prefix |<Obey$Di|
|00000b80| 72 3e 0a 7c 20 54 68 69 | 73 20 66 69 6c 65 20 68 |r>.| Thi|s file h|
|00000b90| 61 73 20 62 65 65 6e 20 | 69 6e 6e 6f 63 75 6c 61 |as been |innocula|
|00000ba0| 74 65 64 20 61 67 61 69 | 6e 73 74 20 74 68 65 20 |ted agai|nst the |
|00000bb0| 45 78 74 65 6e 64 20 56 | 69 72 75 73 0a 7c 7c ff |Extend V|irus.||.|
|00000bc0| 46 69 6c 65 44 61 74 61 | 82 21 52 75 6e 00 65 73 |FileData|.!Run.es|
|00000bd0| 74 00 00 00 64 01 00 00 | 43 eb ff ff e8 fb c1 dc |t...d...|C.......|
|00000be0| 03 00 c8 9d 7c 20 21 52 | 75 6e 20 66 69 6c 65 20 |....| !R|un file |
|00000bf0| 66 6f 72 20 21 46 6f 6e | 74 73 20 28 76 65 72 73 |for !Fon|ts (vers|
|00000c00| 69 6f 6e 20 30 2e 31 31 | 2c 20 31 30 2d 4d 61 79 |ion 0.11|, 10-May|
|00000c10| 2d 38 39 29 0a 7c 0a 49 | 63 6f 6e 73 70 72 69 74 |-89).|.I|consprit|
|00000c20| 65 73 20 3c 4f 62 65 79 | 24 44 69 72 3e 2e 21 53 |es <Obey|$Dir>.!S|
|00000c30| 70 72 69 74 65 73 0a 7c | 0a 7c 20 4b 69 6c 6c 20 |prites.||.| Kill |
|00000c40| 6e 65 77 65 72 20 76 65 | 72 73 69 6f 6e 73 20 6f |newer ve|rsions o|
|00000c50| 66 20 46 6f 6e 74 20 4d | 61 6e 61 67 65 72 0a 7c |f Font M|anager.||
|00000c60| 0a 7c 52 4d 4b 69 6c 6c | 20 46 6f 6e 74 4d 61 6e |.|RMKill| FontMan|
|00000c70| 61 67 65 72 0a 7c 52 4d | 4b 69 6c 6c 20 53 75 70 |ager.|RM|Kill Sup|
|00000c80| 65 72 53 61 6d 70 6c 65 | 0a 7c 0a 7c 52 4d 45 6e |erSample|.|.|RMEn|
|00000c90| 73 75 72 65 20 46 6f 6e | 74 4d 61 6e 61 67 65 72 |sure Fon|tManager|
|00000ca0| 20 32 2e 34 32 20 52 4d | 4c 6f 61 64 20 3c 4f 62 | 2.42 RM|Load <Ob|
|00000cb0| 65 79 24 44 69 72 3e 2e | 46 6f 6e 74 73 0a 7c 52 |ey$Dir>.|Fonts.|R|
|00000cc0| 4d 45 6e 73 75 72 65 20 | 53 75 70 65 72 53 61 6d |MEnsure |SuperSam|
|00000cd0| 70 6c 65 20 30 2e 30 34 | 20 52 4d 4c 6f 61 64 20 |ple 0.04| RMLoad |
|00000ce0| 3c 4f 62 65 79 24 44 69 | 72 3e 2e 53 75 70 65 72 |<Obey$Di|r>.Super|
|00000cf0| 0a 7c 0a 53 65 74 4d 61 | 63 72 6f 20 46 6f 6e 74 |.|.SetMa|cro Font|
|00000d00| 24 50 61 74 68 20 3c 46 | 6f 6e 74 24 50 72 65 66 |$Path <F|ont$Pref|
|00000d10| 69 78 3e 2e 0a 53 65 74 | 20 46 6f 6e 74 24 50 72 |ix>..Set| Font$Pr|
|00000d20| 65 66 69 78 20 3c 4f 62 | 65 79 24 44 69 72 3e 0a |efix <Ob|ey$Dir>.|
|00000d30| 7c 0a 3c 4f 62 65 79 24 | 44 69 72 3e 2e 46 6f 6e ||.<Obey$|Dir>.Fon|
|00000d40| 74 54 65 73 74 0a 0a 0a | 46 69 6c 65 44 61 74 61 |tTest...|FileData|
|00000d50| 82 21 53 70 72 69 74 65 | 73 00 00 00 e4 03 00 00 |.!Sprite|s.......|
|00000d60| 43 f9 ff ff 99 e0 c7 2c | 03 00 a5 f0 02 00 00 00 |C......,|........|
|00000d70| 10 00 00 00 e8 03 00 00 | d4 02 00 00 21 66 6f 6e |........|....!fon|
|00000d80| 74 73 00 00 00 00 00 00 | 04 00 00 00 10 00 00 00 |ts......|........|
|00000d90| 00 00 00 00 07 00 00 00 | 2c 00 00 00 80 01 00 00 |........|,.......|
|00000da0| 0c 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000db0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000de0| 00 00 00 70 77 77 77 77 | 77 00 00 00 00 00 00 00 |...pwwww|w.......|
|00000df0| 00 00 00 00 00 00 00 77 | 99 99 99 99 79 07 00 00 |.......w|....y...|
|00000e00| 00 00 00 00 00 00 00 00 | 70 77 77 97 b9 bb bb bb |........|pww.....|
|00000e10| 99 77 77 77 77 77 77 77 | 07 00 00 00 77 99 99 99 |.wwwwwww|....w...|
|00000e20| bb bb bb bb 9b 99 99 99 | 99 99 99 99 77 00 00 00 |........|....w...|
|00000e30| 77 b9 bb bb bb bb bb bb | bb bb 77 77 77 77 b7 9b |w.......|..wwww..|
|00000e40| 77 00 00 00 77 99 99 99 | 99 99 99 99 99 99 79 97 |w...w...|......y.|
|00000e50| 99 99 99 99 77 00 00 00 | 77 99 99 99 99 99 99 99 |....w...|w.......|
|00000e60| 99 99 79 97 99 99 99 99 | 77 00 00 00 77 f9 ff 7f |..y.....|w...w...|
|00000e70| 77 ff ff ff ff ff 7f 77 | 77 f7 ff 9f 77 00 00 00 |w......w|w...w...|
|00000e80| 77 f9 ff ff 77 ff ff ff | ff ff 7f f7 ff ff ff 9f |w...w...|........|
|00000e90| 77 00 00 00 77 f9 ff ff | 77 ff ff ff ff ff 7f f7 |w...w...|w.......|
|00000ea0| ff ff ff 9f 77 00 00 00 | 77 f9 ff ff 77 ff ff ff |....w...|w...w...|
|00000eb0| ff ff 7f f7 ff ff ff 9f | 77 00 00 00 77 f9 ff 7f |........|w...w...|
|00000ec0| 77 f7 ff ff ff ff 77 77 | ff ff ff 9f 77 00 00 00 |w.....ww|....w...|
|00000ed0| 77 99 99 99 99 99 99 99 | 99 99 99 99 99 99 99 99 |w.......|........|
|00000ee0| 77 00 00 00 77 77 77 77 | 77 77 77 77 77 77 77 77 |w...wwww|wwwwwwww|
|00000ef0| 77 77 77 77 77 f4 ff ff | 00 00 00 00 00 00 00 00 |wwwww...|........|
|00000f00| 00 00 00 00 00 00 00 00 | 00 ff ff ff 00 00 00 00 |........|........|
|00000f10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 ff ff ff |........|........|
|00000f20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f30| 00 ff ff ff 00 00 00 f0 | ff ff ff ff ff 00 00 00 |........|........|
|00000f40| 00 00 00 00 00 ff ff ff | 00 00 00 ff ff ff ff ff |........|........|
|00000f50| ff 0f 00 00 00 00 00 00 | 00 ff ff ff f0 ff ff ff |........|........|
|00000f60| ff ff ff ff ff ff ff ff | ff ff ff ff 0f ff ff ff |........|........|
|00000f70| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000f80| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000f90| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000fa0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000fb0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000fc0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000fd0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000fe0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000ff0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001000| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001010| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001020| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001030| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001040| ff ff ff ff ff ff ff ff | ff 4f 04 18 04 01 00 00 |........|.O......|
|00001050| 73 6d 21 66 6f 6e 74 73 | 00 00 00 00 02 00 00 00 |sm!fonts|........|
|00001060| 08 00 00 00 00 00 00 00 | 0b 00 00 00 2c 00 00 00 |........|....,...|
|00001070| 98 00 00 00 0c 00 00 00 | 33 33 03 33 33 33 33 00 |........|33.3333.|
|00001080| 33 03 00 00 33 73 77 77 | 77 33 33 00 33 03 00 00 |3...3sww|w33.3...|
|00001090| 73 77 99 99 79 77 77 77 | 77 03 00 00 77 b9 bb bb |sw..ywww|w...w...|
|000010a0| bb bb bb bb 79 07 00 00 | 77 99 99 99 99 79 77 97 |....y...|w....yw.|
|000010b0| 79 07 00 00 77 f9 7f f7 | ff 7f ff ff 79 07 00 00 |y...w...|....y...|
|000010c0| 77 f9 ff f7 ff 7f 77 ff | 79 07 00 00 77 99 79 77 |w.....w.|y...w.yw|
|000010d0| 99 79 99 99 79 07 00 00 | 77 77 77 77 77 77 77 77 |.y..y...|wwwwwwww|
|000010e0| 77 07 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |w.......|........|
|000010f0| 00 f0 ff ff ff 00 00 00 | 00 00 00 00 f0 ff ff ff |........|........|
|00001100| ff ff ff ff ff 00 00 00 | ff ff ff ff ff ff ff ff |........|........|
|00001110| ff 0f 00 00 ff ff ff ff | ff ff ff ff ff 0f 00 00 |........|........|
|00001120| ff ff ff ff ff ff ff ff | ff 0f 00 00 ff ff ff ff |........|........|
|00001130| ff ff ff ff ff 0f 00 00 | ff ff ff ff ff ff ff ff |........|........|
|00001140| ff 0f 00 00 ff ff ff ff | ff ff ff ff ff 0f 00 00 |........|........|
|00001150| 46 69 6c 65 44 61 74 61 | 82 46 6f 6e 74 54 65 73 |FileData|.FontTes|
|00001160| 74 00 00 00 9d 06 00 00 | 43 fb ff ff 51 db c2 dc |t.......|C...Q...|
|00001170| 03 00 b1 53 0d 00 0a 10 | f4 20 3e 20 46 6f 6e 74 |...S....|. > Font|
|00001180| 54 65 73 74 0d 00 14 2b | f4 20 50 72 6f 67 72 61 |Test...+|. Progra|
|00001190| 6d 20 74 6f 20 74 65 73 | 74 20 76 61 6c 69 64 69 |m to tes|t validi|
|000011a0| 74 79 20 6f 66 20 46 6f | 6e 74 24 50 61 74 68 0d |ty of Fo|nt$Path.|
|000011b0| 00 1e 1e f4 20 41 6e 64 | 72 65 77 20 46 65 72 67 |.... And|rew Ferg|
|000011c0| 75 73 6f 6e 20 31 32 2f | 30 35 2f 39 32 0d 00 28 |uson 12/|05/92..(|
|000011d0| 05 f4 0d 00 32 17 4d 61 | 78 42 75 66 66 65 72 4c |....2.Ma|xBufferL|
|000011e0| 65 6e 67 74 68 3d 32 35 | 35 0d 00 3c 1f de 20 42 |ength=25|5..<.. B|
|000011f0| 75 66 66 65 72 50 74 72 | 20 4d 61 78 42 75 66 66 |ufferPtr| MaxBuff|
|00001200| 65 72 4c 65 6e 67 74 68 | 0d 00 46 05 f4 0d 00 50 |erLength|..F....P|
|00001210| 2a f4 20 49 6e 69 74 69 | 61 6c 69 73 65 20 61 72 |*. Initi|alise ar|
|00001220| 65 61 20 77 69 74 68 20 | 64 75 6d 6d 79 20 63 68 |ea with |dummy ch|
|00001230| 61 72 61 63 74 65 72 0d | 00 5a 05 f4 0d 00 64 10 |aracter.|.Z....d.|
|00001240| e3 20 4e 25 3d 30 20 b8 | 20 32 35 34 0d 00 6e 15 |. N%=0 .| 254..n.|
|00001250| 3f 28 4e 25 2b 42 75 66 | 66 65 72 50 74 72 29 3d |?(N%+Buf|ferPtr)=|
|00001260| 30 0d 00 78 08 ed 20 4e | 25 0d 00 82 05 f4 0d 00 |0..x.. N|%.......|
|00001270| 8c 26 f4 20 43 68 65 63 | 6b 20 66 6f 72 20 65 78 |.&. Chec|k for ex|
|00001280| 69 73 74 65 6e 63 65 20 | 6f 66 20 46 6f 6e 74 24 |istence |of Font$|
|00001290| 50 61 74 68 0d 00 96 05 | f4 0d 00 a0 4d ee 20 85 |Path....|....M. .|
|000012a0| 20 f2 65 72 72 6f 72 28 | 22 55 6e 61 62 6c 65 20 | .error(|"Unable |
|000012b0| 74 6f 20 6c 6f 63 61 74 | 65 20 46 6f 6e 74 24 50 |to locat|e Font$P|
|000012c0| 61 74 68 2e 20 48 61 73 | 20 21 46 6f 6e 74 73 20 |ath. Has| !Fonts |
|000012d0| 62 65 65 6e 20 73 65 65 | 6e 20 62 79 20 46 69 6c |been see|n by Fil|
|000012e0| 65 72 22 2c 30 29 0d 00 | aa 42 c8 99 20 22 4f 53 |er",0)..|.B.. "OS|
|000012f0| 5f 52 65 61 64 56 61 72 | 56 61 6c 22 2c 22 46 6f |_ReadVar|Val","Fo|
|00001300| 6e 74 24 50 61 74 68 22 | 2c 20 42 75 66 66 65 72 |nt$Path"|, Buffer|
|00001310| 50 74 72 2c 20 4d 61 78 | 42 75 66 66 65 72 4c 65 |Ptr, Max|BufferLe|
|00001320| 6e 67 74 68 2c 30 2c 33 | 0d 00 b4 09 ee 20 85 20 |ngth,0,3|..... . |
|00001330| 87 0d 00 be 05 f4 0d 00 | c8 47 f4 20 52 65 61 64 |........|.G. Read|
|00001340| 20 53 74 72 69 6e 67 20 | 2d 20 53 74 6f 70 20 61 | String |- Stop a|
|00001350| 74 20 66 69 72 73 74 20 | 73 70 61 63 65 20 6f 72 |t first |space or|
|00001360| 20 77 68 65 6e 20 4d 61 | 78 42 75 66 66 65 72 4c | when Ma|xBufferL|
|00001370| 65 6e 67 74 68 20 72 65 | 61 63 68 65 64 0d 00 d2 |ength re|ached...|
|00001380| 24 f4 20 54 61 6b 65 6e | 20 66 72 6f 6d 20 41 72 |$. Taken| from Ar|
|00001390| 63 68 69 76 65 20 34 2e | 31 20 70 61 67 65 20 31 |chive 4.|1 page 1|
|000013a0| 30 0d 00 dc 05 f4 0d 00 | e6 15 4e 25 3d 30 3a 46 |0.......|..N%=0:F|
|000013b0| 6f 6e 74 50 61 74 68 24 | 3d 22 22 0d 00 f0 05 f5 |ontPath$|="".....|
|000013c0| 0d 00 fa 19 4e 24 3d bd | 28 3f 28 4e 25 2b 42 75 |....N$=.|(?(N%+Bu|
|000013d0| 66 66 65 72 50 74 72 29 | 29 0d 01 04 27 e7 20 97 |fferPtr)|)...'. .|
|000013e0| 28 4e 24 29 3c 3e 30 20 | 8c 20 46 6f 6e 74 50 61 |(N$)<>0 |. FontPa|
|000013f0| 74 68 24 3d 46 6f 6e 74 | 50 61 74 68 24 2b 4e 24 |th$=Font|Path$+N$|
|00001400| 0d 01 0e 09 4e 25 2b 3d | 31 0d 01 18 16 fd 20 97 |....N%+=|1..... .|
|00001410| 28 4e 24 29 3d 30 20 84 | 20 4e 25 3d 32 35 36 0d |(N$)=0 .| N%=256.|
|00001420| 01 22 05 f4 0d 01 2c 3c | f4 20 43 68 65 63 6b 20 |."....,<|. Check |
|00001430| 74 6f 20 73 65 65 20 69 | 66 20 73 69 7a 65 20 6f |to see i|f size o|
|00001440| 66 20 46 6f 6e 74 20 50 | 61 74 68 20 69 73 20 67 |f Font P|ath is g|
|00001450| 72 65 61 74 65 72 20 74 | 68 61 6e 20 7a 65 72 6f |reater t|han zero|
|00001460| 0d 01 36 05 f4 0d 01 40 | 4f e7 20 a9 28 46 6f 6e |..6....@|O. .(Fon|
|00001470| 74 50 61 74 68 24 29 3d | 30 20 8c 20 f2 65 72 72 |tPath$)=|0 . .err|
|00001480| 6f 72 28 22 46 6f 6e 74 | 24 50 61 74 68 20 61 70 |or("Font|$Path ap|
|00001490| 70 65 61 72 73 20 74 6f | 20 62 65 20 65 6d 70 74 |pears to| be empt|
|000014a0| 79 20 70 6c 65 61 73 65 | 20 63 6f 72 72 65 63 74 |y please| correct|
|000014b0| 22 2c 30 29 0d 01 4a 05 | f4 0d 01 54 41 f4 20 52 |",0)..J.|...TA. R|
|000014c0| 65 61 64 20 74 68 72 6f | 75 67 68 20 46 6f 6e 74 |ead thro|ugh Font|
|000014d0| 50 61 74 68 24 20 61 6e | 64 20 63 68 65 63 6b 20 |Path$ an|d check |
|000014e0| 74 68 61 74 20 65 61 63 | 68 20 65 6e 74 72 79 20 |that eac|h entry |
|000014f0| 69 73 20 61 20 76 61 6c | 69 64 0d 01 5e 34 f4 20 |is a val|id..^4. |
|00001500| 44 69 72 65 63 74 6f 72 | 79 2e 20 44 69 72 65 63 |Director|y. Direc|
|00001510| 74 6f 72 69 65 73 20 61 | 72 65 20 73 65 70 61 72 |tories a|re separ|
|00001520| 61 74 65 64 20 62 79 20 | 63 6f 6d 6d 61 73 0d 01 |ated by |commas..|
|00001530| 68 05 f4 0d 01 72 14 4e | 25 3d 31 3a 4e 24 3d 22 |h....r.N|%=1:N$="|
|00001540| 22 3a 41 24 3d 22 22 0d | 01 7c 05 f5 0d 01 86 05 |":A$="".|.|......|
|00001550| f5 0d 01 90 26 41 24 3d | c1 46 6f 6e 74 50 61 74 |....&A$=|.FontPat|
|00001560| 68 24 2c 4e 25 2c 31 29 | 3a e7 20 41 24 3d 22 2c |h$,N%,1)|:. A$=",|
|00001570| 22 20 41 24 3d 22 22 0d | 01 9a 12 4e 24 3d 4e 24 |" A$="".|...N$=N$|
|00001580| 2b 41 24 3a 4e 25 2b 3d | 31 0d 01 a4 1d fd 20 41 |+A$:N%+=|1..... A|
|00001590| 24 3d 22 22 20 84 20 4e | 25 3d a9 28 46 6f 6e 74 |$="" . N|%=.(Font|
|000015a0| 50 61 74 68 24 29 0d 01 | ae 13 41 3d a4 63 68 65 |Path$)..|..A=.che|
|000015b0| 63 6b 64 69 72 28 4e 24 | 29 0d 01 b8 4b e7 20 41 |ckdir(N$|)...K. A|
|000015c0| 3c 3e 32 20 8c 20 f2 65 | 72 72 6f 72 28 4e 24 2b |<>2 . .e|rror(N$+|
|000015d0| 22 20 69 73 20 6e 6f 74 | 20 61 20 76 61 6c 69 64 |" is not| a valid|
|000015e0| 20 46 6f 6e 74 73 20 44 | 69 72 65 63 74 6f 72 79 | Fonts D|irectory|
|000015f0| 20 69 6e 20 46 6f 6e 74 | 24 50 61 74 68 21 21 21 | in Font|$Path!!!|
|00001600| 22 2c 30 29 0d 01 c2 09 | 4e 24 3d 22 22 0d 01 cc |",0)....|N$=""...|
|00001610| 15 fd 20 4e 25 3d a9 28 | 46 6f 6e 74 50 61 74 68 |.. N%=.(|FontPath|
|00001620| 24 29 0d 01 d6 05 f4 0d | 01 e0 3e f4 20 49 66 20 |$)......|..>. If |
|00001630| 74 68 69 73 20 70 61 72 | 74 20 6f 66 20 74 68 65 |this par|t of the|
|00001640| 20 70 72 6f 67 72 61 6d | 20 69 73 20 72 65 61 63 | program| is reac|
|00001650| 68 65 64 20 74 68 65 6e | 20 61 6c 6c 20 69 73 20 |hed then| all is |
|00001660| 77 65 6c 6c 2e 0d 01 ea | 05 f4 0d 01 f4 05 e0 0d |well....|........|
|00001670| 01 fe 05 f4 0d 02 08 28 | f4 20 50 72 6f 63 65 64 |.......(|. Proced|
|00001680| 75 72 65 20 74 6f 20 64 | 69 73 70 6c 61 79 20 65 |ure to d|isplay e|
|00001690| 72 72 6f 72 20 6d 65 73 | 73 61 67 65 0d 02 12 05 |rror mes|sage....|
|000016a0| f4 0d 02 1c 1a dd 20 f2 | 65 72 72 6f 72 28 45 72 |...... .|error(Er|
|000016b0| 72 6f 72 24 2c 45 72 72 | 6f 72 29 0d 02 26 0d de |ror$,Err|or)..&..|
|000016c0| 20 62 25 20 31 30 30 30 | 0d 02 30 1c 21 62 25 3d | b% 1000|..0.!b%=|
|000016d0| 45 72 72 6f 72 3a 24 28 | 62 25 2b 34 29 3d 45 72 |Error:$(|b%+4)=Er|
|000016e0| 72 6f 72 24 0d 02 3a 16 | 3f 28 62 25 2b a9 24 28 |ror$..:.|?(b%+.$(|
|000016f0| 62 25 2b 34 29 2b 34 29 | 3d 30 0d 02 44 3b c8 99 |b%+4)+4)|=0..D;..|
|00001700| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|00001710| 72 22 2c 62 25 2c 26 31 | 38 2c 22 45 72 72 6f 72 |r",b%,&1|8,"Error|
|00001720| 20 66 72 6f 6d 20 46 6f | 6e 74 24 50 61 74 68 20 | from Fo|nt$Path |
|00001730| 54 65 73 74 22 0d 02 4e | 05 e0 0d 02 58 05 e1 0d |Test"..N|....X...|
|00001740| 02 62 05 f4 0d 02 6c 2e | f4 20 46 75 6e 63 74 69 |.b....l.|. Functi|
|00001750| 6f 6e 20 74 6f 20 63 68 | 65 63 6b 20 74 68 61 74 |on to ch|eck that|
|00001760| 20 4e 24 20 69 73 20 61 | 20 64 69 72 65 63 74 6f | N$ is a| directo|
|00001770| 72 79 0d 02 76 05 f4 0d | 02 80 19 dd 20 a4 63 68 |ry..v...|.... .ch|
|00001780| 65 63 6b 64 69 72 28 46 | 6f 6e 74 44 69 72 24 29 |eckdir(F|ontDir$)|
|00001790| 0d 02 8a 0d de 20 62 25 | 20 31 30 30 30 0d 02 94 |..... b%| 1000...|
|000017a0| 38 e7 20 c2 46 6f 6e 74 | 44 69 72 24 29 3d 22 2e |8. .Font|Dir$)=".|
|000017b0| 22 20 8c 20 46 6f 6e 74 | 44 69 72 24 3d c0 46 6f |" . Font|Dir$=.Fo|
|000017c0| 6e 74 44 69 72 24 2c a9 | 28 46 6f 6e 74 44 69 72 |ntDir$,.|(FontDir|
|000017d0| 24 29 2d 31 29 0d 02 9e | 10 24 62 25 3d 46 6f 6e |$)-1)...|.$b%=Fon|
|000017e0| 74 44 69 72 24 0d 02 a8 | 1f c8 99 20 22 58 4f 53 |tDir$...|... "XOS|
|000017f0| 5f 46 69 6c 65 22 2c 35 | 2c 62 25 20 b8 20 45 78 |_File",5|,b% . Ex|
|00001800| 69 73 74 73 0d 02 b2 0b | 3d 45 78 69 73 74 73 0d |ists....|=Exists.|
|00001810| ff 46 69 6c 65 44 61 74 | 61 82 21 42 6f 6f 74 00 |.FileDat|a.!Boot.|
|00001820| 73 74 00 00 00 78 00 00 | 00 43 eb ff ff 7e b0 c1 |st...x..|.C...~..|
|00001830| dc 03 00 94 64 7c 20 42 | 6f 6f 74 20 66 69 6c 65 |....d| B|oot file|
|00001840| 20 66 6f 72 20 21 46 6f | 6e 74 73 0a 7c 0a 49 63 | for !Fo|nts.|.Ic|
|00001850| 6f 6e 73 70 72 69 74 65 | 73 20 3c 4f 62 65 79 24 |onsprite|s <Obey$|
|00001860| 44 69 72 3e 2e 21 53 70 | 72 69 74 65 73 0a 7c 0a |Dir>.!Sp|rites.|.|
|00001870| 7c 20 54 68 69 73 20 66 | 69 6c 65 20 68 61 73 20 || This f|ile has |
|00001880| 62 65 65 6e 20 69 6e 6e | 6f 63 75 6c 61 74 65 64 |been inn|oculated|
|00001890| 20 61 67 61 69 6e 73 74 | 20 74 68 65 20 45 78 74 | against| the Ext|
|000018a0| 65 6e 64 20 56 69 72 75 | 73 0a 7c 7c ff 46 69 6c |end Viru|s.||.Fil|
|000018b0| 65 44 61 74 61 82 21 52 | 75 6e 00 65 73 74 00 00 |eData.!R|un.est..|
|000018c0| 00 a4 01 00 00 43 eb ff | ff 2b 8a c8 dc 03 00 9c |.....C..|.+......|
|000018d0| ac 7c 20 21 52 75 6e 20 | 66 69 6c 65 20 66 6f 72 |.| !Run |file for|
|000018e0| 20 21 46 6f 6e 74 73 20 | 28 76 65 72 73 69 6f 6e | !Fonts |(version|
|000018f0| 20 30 2e 31 31 2c 20 31 | 30 2d 4d 61 79 2d 38 39 | 0.11, 1|0-May-89|
|00001900| 29 0a 7c 0a 49 63 6f 6e | 73 70 72 69 74 65 73 20 |).|.Icon|sprites |
|00001910| 3c 4f 62 65 79 24 44 69 | 72 3e 2e 21 53 70 72 69 |<Obey$Di|r>.!Spri|
|00001920| 74 65 73 0a 7c 0a 7c 20 | 4b 69 6c 6c 20 6e 65 77 |tes.|.| |Kill new|
|00001930| 65 72 20 76 65 72 73 69 | 6f 6e 73 20 6f 66 20 46 |er versi|ons of F|
|00001940| 6f 6e 74 20 4d 61 6e 61 | 67 65 72 0a 7c 0a 7c 52 |ont Mana|ger.|.|R|
|00001950| 4d 4b 69 6c 6c 20 46 6f | 6e 74 4d 61 6e 61 67 65 |MKill Fo|ntManage|
|00001960| 72 0a 7c 52 4d 4b 69 6c | 6c 20 53 75 70 65 72 53 |r.|RMKil|l SuperS|
|00001970| 61 6d 70 6c 65 0a 7c 0a | 7c 52 4d 45 6e 73 75 72 |ample.|.||RMEnsur|
|00001980| 65 20 46 6f 6e 74 4d 61 | 6e 61 67 65 72 20 32 2e |e FontMa|nager 2.|
|00001990| 34 32 20 52 4d 4c 6f 61 | 64 20 3c 4f 62 65 79 24 |42 RMLoa|d <Obey$|
|000019a0| 44 69 72 3e 2e 46 6f 6e | 74 73 0a 7c 52 4d 45 6e |Dir>.Fon|ts.|RMEn|
|000019b0| 73 75 72 65 20 53 75 70 | 65 72 53 61 6d 70 6c 65 |sure Sup|erSample|
|000019c0| 20 30 2e 30 34 20 52 4d | 4c 6f 61 64 20 3c 4f 62 | 0.04 RM|Load <Ob|
|000019d0| 65 79 24 44 69 72 3e 2e | 53 75 70 65 72 0a 7c 0a |ey$Dir>.|Super.|.|
|000019e0| 53 65 74 4d 61 63 72 6f | 20 46 6f 6e 74 24 50 61 |SetMacro| Font$Pa|
|000019f0| 74 68 20 61 64 66 73 3a | 3a 46 6f 6e 74 54 65 73 |th adfs:|:FontTes|
|00001a00| 74 2e 24 2e 45 78 61 6d | 70 6c 65 2e 21 46 6f 6e |t.$.Exam|ple.!Fon|
|00001a10| 74 73 2c 61 64 66 73 3a | 3a 46 6f 6e 74 54 65 73 |ts,adfs:|:FontTes|
|00001a20| 74 2e 24 2e 45 78 61 6d | 70 6c 65 2e 21 46 6f 6e |t.$.Exam|ple.!Fon|
|00001a30| 74 73 33 2c 3c 46 6f 6e | 74 24 50 72 65 66 69 78 |ts3,<Fon|t$Prefix|
|00001a40| 3e 2e 0a 53 65 74 20 46 | 6f 6e 74 24 50 72 65 66 |>..Set F|ont$Pref|
|00001a50| 69 78 20 3c 4f 62 65 79 | 24 44 69 72 3e 0a 7c 0a |ix <Obey|$Dir>.|.|
|00001a60| 3c 4f 62 65 79 24 44 69 | 72 3e 2e 46 6f 6e 74 54 |<Obey$Di|r>.FontT|
|00001a70| 65 73 74 0a 0a 46 69 6c | 65 44 61 74 61 82 21 53 |est..Fil|eData.!S|
|00001a80| 70 72 69 74 65 73 00 00 | 00 e4 03 00 00 43 f9 ff |prites..|.....C..|
|00001a90| ff 53 94 ca 88 03 00 c6 | e2 02 00 00 00 10 00 00 |.S......|........|
|00001aa0| 00 e8 03 00 00 d4 02 00 | 00 21 66 6f 6e 74 73 32 |........|.!fonts2|
|00001ab0| 00 00 00 00 00 04 00 00 | 00 10 00 00 00 00 00 00 |........|........|
|00001ac0| 00 07 00 00 00 2c 00 00 | 00 80 01 00 00 0c 00 00 |.....,..|........|
|00001ad0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001af0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b10| 70 77 77 77 77 77 00 00 | 00 00 00 00 00 00 00 00 |pwwwww..|........|
|00001b20| 00 00 00 00 77 99 99 99 | 99 79 07 00 00 00 00 00 |....w...|.y......|
|00001b30| 00 00 00 00 00 70 77 77 | 97 b9 bb bb bb 99 77 77 |.....pww|......ww|
|00001b40| 77 77 77 77 77 07 00 00 | 00 77 99 99 99 bb bb bb |wwwww...|.w......|
|00001b50| bb 9b 99 99 99 99 99 99 | 99 77 00 00 00 77 b9 bb |........|.w...w..|
|00001b60| bb bb bb bb bb bb bb 77 | 77 77 77 b7 9b 77 00 00 |.......w|www..w..|
|00001b70| 00 77 99 99 99 99 99 99 | 99 99 99 79 97 99 99 99 |.w......|...y....|
|00001b80| 99 77 00 00 00 77 99 99 | 99 99 99 99 99 99 99 79 |.w...w..|.......y|
|00001b90| 97 99 99 99 99 77 00 00 | 00 77 f9 ff 7f 77 ff ff |.....w..|.w...w..|
|00001ba0| ff ff ff 7f 77 77 f7 ff | 9f 77 00 00 00 77 f9 ff |....ww..|.w...w..|
|00001bb0| ff 77 ff ff ff ff ff 7f | f7 ff ff ff 9f 77 00 00 |.w......|.....w..|
|00001bc0| 00 77 f9 ff ff 77 ff ff | ff ff ff 7f f7 ff ff ff |.w...w..|........|
|00001bd0| 9f 77 00 00 00 77 f9 ff | ff 77 ff ff ff ff ff 7f |.w...w..|.w......|
|00001be0| f7 ff ff ff 9f 77 00 00 | 00 77 f9 ff 7f 77 f7 ff |.....w..|.w...w..|
|00001bf0| ff ff ff 77 77 ff ff ff | 9f 77 00 00 00 77 99 99 |...ww...|.w...w..|
|00001c00| 99 99 99 99 99 99 99 99 | 99 99 99 99 99 77 00 00 |........|.....w..|
|00001c10| 00 77 77 77 77 77 77 77 | 77 77 77 77 77 77 77 77 |.wwwwwww|wwwwwwww|
|00001c20| 77 77 f4 ff ff 00 00 00 | 00 00 00 00 00 00 00 00 |ww......|........|
|00001c30| 00 00 00 00 00 00 ff ff | ff 00 00 00 00 00 00 00 |........|........|
|00001c40| 00 00 00 00 00 00 00 00 | 00 00 ff ff ff 00 00 00 |........|........|
|00001c50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 ff ff |........|........|
|00001c60| ff 00 00 00 f0 ff ff ff | ff ff 00 00 00 00 00 00 |........|........|
|00001c70| 00 00 ff ff ff 00 00 00 | ff ff ff ff ff ff 0f 00 |........|........|
|00001c80| 00 00 00 00 00 00 ff ff | ff f0 ff ff ff ff ff ff |........|........|
|00001c90| ff ff ff ff ff ff ff ff | ff 0f ff ff ff ff ff ff |........|........|
|00001ca0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001cb0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001cc0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001cd0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001ce0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001cf0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001d00| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001d10| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001d20| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001d30| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001d40| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001d50| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001d60| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00001d70| ff ff ff ff ff ff 4f 04 | 18 04 01 00 00 73 6d 21 |......O.|.....sm!|
|00001d80| 66 6f 6e 74 73 32 00 00 | 00 02 00 00 00 08 00 00 |fonts2..|........|
|00001d90| 00 00 00 00 00 0b 00 00 | 00 2c 00 00 00 98 00 00 |........|.,......|
|00001da0| 00 0c 00 00 00 33 33 03 | 33 33 33 33 00 33 03 00 |.....33.|3333.3..|
|00001db0| 00 33 73 77 77 77 33 33 | 00 33 03 00 00 73 77 99 |.3swww33|.3...sw.|
|00001dc0| 99 79 77 77 77 77 03 00 | 00 77 b9 bb bb bb bb bb |.ywwww..|.w......|
|00001dd0| bb 79 07 00 00 77 99 99 | 99 99 79 77 97 79 07 00 |.y...w..|..yw.y..|
|00001de0| 00 77 f9 7f f7 ff 7f ff | ff 79 07 00 00 77 f9 ff |.w......|.y...w..|
|00001df0| f7 ff 7f 77 ff 79 07 00 | 00 77 99 79 77 99 79 99 |...w.y..|.w.yw.y.|
|00001e00| 99 79 07 00 00 77 77 77 | 77 77 77 77 77 77 07 00 |.y...www|wwwwww..|
|00001e10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 f0 ff |........|........|
|00001e20| ff ff 00 00 00 00 00 00 | 00 f0 ff ff ff ff ff ff |........|........|
|00001e30| ff ff 00 00 00 ff ff ff | ff ff ff ff ff ff 0f 00 |........|........|
|00001e40| 00 ff ff ff ff ff ff ff | ff ff 0f 00 00 ff ff ff |........|........|
|00001e50| ff ff ff ff ff ff 0f 00 | 00 ff ff ff ff ff ff ff |........|........|
|00001e60| ff ff 0f 00 00 ff ff ff | ff ff ff ff ff ff 0f 00 |........|........|
|00001e70| 00 ff ff ff ff ff ff ff | ff ff 0f 00 00 46 69 6c |........|.....Fil|
|00001e80| 65 44 61 74 61 82 46 6f | 6e 74 54 65 73 74 00 00 |eData.Fo|ntTest..|
|00001e90| 00 9d 06 00 00 43 fb ff | ff 51 db c2 dc 03 00 b1 |.....C..|.Q......|
|00001ea0| 53 0d 00 0a 10 f4 20 3e | 20 46 6f 6e 74 54 65 73 |S..... >| FontTes|
|00001eb0| 74 0d 00 14 2b f4 20 50 | 72 6f 67 72 61 6d 20 74 |t...+. P|rogram t|
|00001ec0| 6f 20 74 65 73 74 20 76 | 61 6c 69 64 69 74 79 20 |o test v|alidity |
|00001ed0| 6f 66 20 46 6f 6e 74 24 | 50 61 74 68 0d 00 1e 1e |of Font$|Path....|
|00001ee0| f4 20 41 6e 64 72 65 77 | 20 46 65 72 67 75 73 6f |. Andrew| Ferguso|
|00001ef0| 6e 20 31 32 2f 30 35 2f | 39 32 0d 00 28 05 f4 0d |n 12/05/|92..(...|
|00001f00| 00 32 17 4d 61 78 42 75 | 66 66 65 72 4c 65 6e 67 |.2.MaxBu|fferLeng|
|00001f10| 74 68 3d 32 35 35 0d 00 | 3c 1f de 20 42 75 66 66 |th=255..|<.. Buff|
|00001f20| 65 72 50 74 72 20 4d 61 | 78 42 75 66 66 65 72 4c |erPtr Ma|xBufferL|
|00001f30| 65 6e 67 74 68 0d 00 46 | 05 f4 0d 00 50 2a f4 20 |ength..F|....P*. |
|00001f40| 49 6e 69 74 69 61 6c 69 | 73 65 20 61 72 65 61 20 |Initiali|se area |
|00001f50| 77 69 74 68 20 64 75 6d | 6d 79 20 63 68 61 72 61 |with dum|my chara|
|00001f60| 63 74 65 72 0d 00 5a 05 | f4 0d 00 64 10 e3 20 4e |cter..Z.|...d.. N|
|00001f70| 25 3d 30 20 b8 20 32 35 | 34 0d 00 6e 15 3f 28 4e |%=0 . 25|4..n.?(N|
|00001f80| 25 2b 42 75 66 66 65 72 | 50 74 72 29 3d 30 0d 00 |%+Buffer|Ptr)=0..|
|00001f90| 78 08 ed 20 4e 25 0d 00 | 82 05 f4 0d 00 8c 26 f4 |x.. N%..|......&.|
|00001fa0| 20 43 68 65 63 6b 20 66 | 6f 72 20 65 78 69 73 74 | Check f|or exist|
|00001fb0| 65 6e 63 65 20 6f 66 20 | 46 6f 6e 74 24 50 61 74 |ence of |Font$Pat|
|00001fc0| 68 0d 00 96 05 f4 0d 00 | a0 4d ee 20 85 20 f2 65 |h.......|.M. . .e|
|00001fd0| 72 72 6f 72 28 22 55 6e | 61 62 6c 65 20 74 6f 20 |rror("Un|able to |
|00001fe0| 6c 6f 63 61 74 65 20 46 | 6f 6e 74 24 50 61 74 68 |locate F|ont$Path|
|00001ff0| 2e 20 48 61 73 20 21 46 | 6f 6e 74 73 20 62 65 65 |. Has !F|onts bee|
|00002000| 6e 20 73 65 65 6e 20 62 | 79 20 46 69 6c 65 72 22 |n seen b|y Filer"|
|00002010| 2c 30 29 0d 00 aa 42 c8 | 99 20 22 4f 53 5f 52 65 |,0)...B.|. "OS_Re|
|00002020| 61 64 56 61 72 56 61 6c | 22 2c 22 46 6f 6e 74 24 |adVarVal|","Font$|
|00002030| 50 61 74 68 22 2c 20 42 | 75 66 66 65 72 50 74 72 |Path", B|ufferPtr|
|00002040| 2c 20 4d 61 78 42 75 66 | 66 65 72 4c 65 6e 67 74 |, MaxBuf|ferLengt|
|00002050| 68 2c 30 2c 33 0d 00 b4 | 09 ee 20 85 20 87 0d 00 |h,0,3...|.. . ...|
|00002060| be 05 f4 0d 00 c8 47 f4 | 20 52 65 61 64 20 53 74 |......G.| Read St|
|00002070| 72 69 6e 67 20 2d 20 53 | 74 6f 70 20 61 74 20 66 |ring - S|top at f|
|00002080| 69 72 73 74 20 73 70 61 | 63 65 20 6f 72 20 77 68 |irst spa|ce or wh|
|00002090| 65 6e 20 4d 61 78 42 75 | 66 66 65 72 4c 65 6e 67 |en MaxBu|fferLeng|
|000020a0| 74 68 20 72 65 61 63 68 | 65 64 0d 00 d2 24 f4 20 |th reach|ed...$. |
|000020b0| 54 61 6b 65 6e 20 66 72 | 6f 6d 20 41 72 63 68 69 |Taken fr|om Archi|
|000020c0| 76 65 20 34 2e 31 20 70 | 61 67 65 20 31 30 0d 00 |ve 4.1 p|age 10..|
|000020d0| dc 05 f4 0d 00 e6 15 4e | 25 3d 30 3a 46 6f 6e 74 |.......N|%=0:Font|
|000020e0| 50 61 74 68 24 3d 22 22 | 0d 00 f0 05 f5 0d 00 fa |Path$=""|........|
|000020f0| 19 4e 24 3d bd 28 3f 28 | 4e 25 2b 42 75 66 66 65 |.N$=.(?(|N%+Buffe|
|00002100| 72 50 74 72 29 29 0d 01 | 04 27 e7 20 97 28 4e 24 |rPtr))..|.'. .(N$|
|00002110| 29 3c 3e 30 20 8c 20 46 | 6f 6e 74 50 61 74 68 24 |)<>0 . F|ontPath$|
|00002120| 3d 46 6f 6e 74 50 61 74 | 68 24 2b 4e 24 0d 01 0e |=FontPat|h$+N$...|
|00002130| 09 4e 25 2b 3d 31 0d 01 | 18 16 fd 20 97 28 4e 24 |.N%+=1..|... .(N$|
|00002140| 29 3d 30 20 84 20 4e 25 | 3d 32 35 36 0d 01 22 05 |)=0 . N%|=256..".|
|00002150| f4 0d 01 2c 3c f4 20 43 | 68 65 63 6b 20 74 6f 20 |...,<. C|heck to |
|00002160| 73 65 65 20 69 66 20 73 | 69 7a 65 20 6f 66 20 46 |see if s|ize of F|
|00002170| 6f 6e 74 20 50 61 74 68 | 20 69 73 20 67 72 65 61 |ont Path| is grea|
|00002180| 74 65 72 20 74 68 61 6e | 20 7a 65 72 6f 0d 01 36 |ter than| zero..6|
|00002190| 05 f4 0d 01 40 4f e7 20 | a9 28 46 6f 6e 74 50 61 |....@O. |.(FontPa|
|000021a0| 74 68 24 29 3d 30 20 8c | 20 f2 65 72 72 6f 72 28 |th$)=0 .| .error(|
|000021b0| 22 46 6f 6e 74 24 50 61 | 74 68 20 61 70 70 65 61 |"Font$Pa|th appea|
|000021c0| 72 73 20 74 6f 20 62 65 | 20 65 6d 70 74 79 20 70 |rs to be| empty p|
|000021d0| 6c 65 61 73 65 20 63 6f | 72 72 65 63 74 22 2c 30 |lease co|rrect",0|
|000021e0| 29 0d 01 4a 05 f4 0d 01 | 54 41 f4 20 52 65 61 64 |)..J....|TA. Read|
|000021f0| 20 74 68 72 6f 75 67 68 | 20 46 6f 6e 74 50 61 74 | through| FontPat|
|00002200| 68 24 20 61 6e 64 20 63 | 68 65 63 6b 20 74 68 61 |h$ and c|heck tha|
|00002210| 74 20 65 61 63 68 20 65 | 6e 74 72 79 20 69 73 20 |t each e|ntry is |
|00002220| 61 20 76 61 6c 69 64 0d | 01 5e 34 f4 20 44 69 72 |a valid.|.^4. Dir|
|00002230| 65 63 74 6f 72 79 2e 20 | 44 69 72 65 63 74 6f 72 |ectory. |Director|
|00002240| 69 65 73 20 61 72 65 20 | 73 65 70 61 72 61 74 65 |ies are |separate|
|00002250| 64 20 62 79 20 63 6f 6d | 6d 61 73 0d 01 68 05 f4 |d by com|mas..h..|
|00002260| 0d 01 72 14 4e 25 3d 31 | 3a 4e 24 3d 22 22 3a 41 |..r.N%=1|:N$="":A|
|00002270| 24 3d 22 22 0d 01 7c 05 | f5 0d 01 86 05 f5 0d 01 |$=""..|.|........|
|00002280| 90 26 41 24 3d c1 46 6f | 6e 74 50 61 74 68 24 2c |.&A$=.Fo|ntPath$,|
|00002290| 4e 25 2c 31 29 3a e7 20 | 41 24 3d 22 2c 22 20 41 |N%,1):. |A$="," A|
|000022a0| 24 3d 22 22 0d 01 9a 12 | 4e 24 3d 4e 24 2b 41 24 |$=""....|N$=N$+A$|
|000022b0| 3a 4e 25 2b 3d 31 0d 01 | a4 1d fd 20 41 24 3d 22 |:N%+=1..|... A$="|
|000022c0| 22 20 84 20 4e 25 3d a9 | 28 46 6f 6e 74 50 61 74 |" . N%=.|(FontPat|
|000022d0| 68 24 29 0d 01 ae 13 41 | 3d a4 63 68 65 63 6b 64 |h$)....A|=.checkd|
|000022e0| 69 72 28 4e 24 29 0d 01 | b8 4b e7 20 41 3c 3e 32 |ir(N$)..|.K. A<>2|
|000022f0| 20 8c 20 f2 65 72 72 6f | 72 28 4e 24 2b 22 20 69 | . .erro|r(N$+" i|
|00002300| 73 20 6e 6f 74 20 61 20 | 76 61 6c 69 64 20 46 6f |s not a |valid Fo|
|00002310| 6e 74 73 20 44 69 72 65 | 63 74 6f 72 79 20 69 6e |nts Dire|ctory in|
|00002320| 20 46 6f 6e 74 24 50 61 | 74 68 21 21 21 22 2c 30 | Font$Pa|th!!!",0|
|00002330| 29 0d 01 c2 09 4e 24 3d | 22 22 0d 01 cc 15 fd 20 |)....N$=|""..... |
|00002340| 4e 25 3d a9 28 46 6f 6e | 74 50 61 74 68 24 29 0d |N%=.(Fon|tPath$).|
|00002350| 01 d6 05 f4 0d 01 e0 3e | f4 20 49 66 20 74 68 69 |.......>|. If thi|
|00002360| 73 20 70 61 72 74 20 6f | 66 20 74 68 65 20 70 72 |s part o|f the pr|
|00002370| 6f 67 72 61 6d 20 69 73 | 20 72 65 61 63 68 65 64 |ogram is| reached|
|00002380| 20 74 68 65 6e 20 61 6c | 6c 20 69 73 20 77 65 6c | then al|l is wel|
|00002390| 6c 2e 0d 01 ea 05 f4 0d | 01 f4 05 e0 0d 01 fe 05 |l.......|........|
|000023a0| f4 0d 02 08 28 f4 20 50 | 72 6f 63 65 64 75 72 65 |....(. P|rocedure|
|000023b0| 20 74 6f 20 64 69 73 70 | 6c 61 79 20 65 72 72 6f | to disp|lay erro|
|000023c0| 72 20 6d 65 73 73 61 67 | 65 0d 02 12 05 f4 0d 02 |r messag|e.......|
|000023d0| 1c 1a dd 20 f2 65 72 72 | 6f 72 28 45 72 72 6f 72 |... .err|or(Error|
|000023e0| 24 2c 45 72 72 6f 72 29 | 0d 02 26 0d de 20 62 25 |$,Error)|..&.. b%|
|000023f0| 20 31 30 30 30 0d 02 30 | 1c 21 62 25 3d 45 72 72 | 1000..0|.!b%=Err|
|00002400| 6f 72 3a 24 28 62 25 2b | 34 29 3d 45 72 72 6f 72 |or:$(b%+|4)=Error|
|00002410| 24 0d 02 3a 16 3f 28 62 | 25 2b a9 24 28 62 25 2b |$..:.?(b|%+.$(b%+|
|00002420| 34 29 2b 34 29 3d 30 0d | 02 44 3b c8 99 22 57 69 |4)+4)=0.|.D;.."Wi|
|00002430| 6d 70 5f 52 65 70 6f 72 | 74 45 72 72 6f 72 22 2c |mp_Repor|tError",|
|00002440| 62 25 2c 26 31 38 2c 22 | 45 72 72 6f 72 20 66 72 |b%,&18,"|Error fr|
|00002450| 6f 6d 20 46 6f 6e 74 24 | 50 61 74 68 20 54 65 73 |om Font$|Path Tes|
|00002460| 74 22 0d 02 4e 05 e0 0d | 02 58 05 e1 0d 02 62 05 |t"..N...|.X....b.|
|00002470| f4 0d 02 6c 2e f4 20 46 | 75 6e 63 74 69 6f 6e 20 |...l.. F|unction |
|00002480| 74 6f 20 63 68 65 63 6b | 20 74 68 61 74 20 4e 24 |to check| that N$|
|00002490| 20 69 73 20 61 20 64 69 | 72 65 63 74 6f 72 79 0d | is a di|rectory.|
|000024a0| 02 76 05 f4 0d 02 80 19 | dd 20 a4 63 68 65 63 6b |.v......|. .check|
|000024b0| 64 69 72 28 46 6f 6e 74 | 44 69 72 24 29 0d 02 8a |dir(Font|Dir$)...|
|000024c0| 0d de 20 62 25 20 31 30 | 30 30 0d 02 94 38 e7 20 |.. b% 10|00...8. |
|000024d0| c2 46 6f 6e 74 44 69 72 | 24 29 3d 22 2e 22 20 8c |.FontDir|$)="." .|
|000024e0| 20 46 6f 6e 74 44 69 72 | 24 3d c0 46 6f 6e 74 44 | FontDir|$=.FontD|
|000024f0| 69 72 24 2c a9 28 46 6f | 6e 74 44 69 72 24 29 2d |ir$,.(Fo|ntDir$)-|
|00002500| 31 29 0d 02 9e 10 24 62 | 25 3d 46 6f 6e 74 44 69 |1)....$b|%=FontDi|
|00002510| 72 24 0d 02 a8 1f c8 99 | 20 22 58 4f 53 5f 46 69 |r$......| "XOS_Fi|
|00002520| 6c 65 22 2c 35 2c 62 25 | 20 b8 20 45 78 69 73 74 |le",5,b%| . Exist|
|00002530| 73 0d 02 b2 0b 3d 45 78 | 69 73 74 73 0d ff 46 69 |s....=Ex|ists..Fi|
|00002540| 6c 65 44 61 74 61 82 21 | 46 6f 6e 74 73 33 00 00 |leData.!|Fonts3..|
|00002550| 00 00 0b 00 00 00 43 ff | ff ff 60 59 c5 dc 03 00 |......C.|..`Y....|
|00002560| 03 88 41 20 54 65 78 74 | 20 46 69 6c 65          |..A Text| File   |
+--------+-------------------------+-------------------------+--------+--------+